home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 December / Chip_2001-12_cd1.bin / zkuste / tuning / download / xteq / setup.exe / {app} / plugins / XQ McAfee VirusScan 2.xpl < prev    next >
Text File  |  2001-04-10  |  2KB  |  56 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="7"
  3. "COUNT"="2"
  4. "UIPATH"="Program Options\Other Programs\McAfee VirusScan"
  5. "NAME"="User Interface"
  6. "LANGUAGE"="VBScript"
  7. "TEXT 1"="Use normal user interface"
  8. "TEXT 2"="Use basic user interface"
  9. "DESCRIPTION 1"="Normally, McAfee VirusScan uses an interface like that of the Windows Find dialog. However, it also has a more basic interface that you can use."
  10. "DESCRIPTION 2"="To enable the default interface, check the top option; to use the more basic interface, check the bottom option."
  11. "COMMENT 1"="Discovered by accident!"
  12. "VERSION"="1.0"
  13. "AUTHOR"="Neil R. Turner (totalxs@hotmail.com) for Xteq Systems"
  14. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  15.  
  16. 'Declaration of some constants
  17. sP="HKLM\Software\McAfee\Scan95\DefaultVSC"
  18. sN="UIType"
  19.  
  20. 'Called when the Plugin is started
  21. SUB Plugin_Initialize
  22.  s=RegReadValue(sP)
  23.  if IsEmpty(s)=false then
  24.   t=IniReadValue(s,"ScanOptions",sN)
  25.   if t="0" then
  26.    Call SetUIElement(1,true)
  27.   else
  28.    Call SetUIElement(2,true)
  29.   end if
  30.  else
  31.   Call Disable()
  32.  end if
  33. END SUB
  34.  
  35. 'Called when the Plugin should validate the Data the user has entered
  36. SUB Plugin_CheckData(ElementIndex)
  37. END SUB
  38.  
  39. 'Called when the Plugin should apply the changes
  40. SUB Plugin_Apply(ElementIndex,ElementSubIndex)
  41.  s=GetUIElement(1)
  42.  v=RegReadValue(sP)
  43.  if s=true then
  44.   Call IniWriteValue(v,"ScanOptions",sN,"0")
  45.  end if
  46.  
  47.  s=GetUIElement(2)
  48.  if s=true then
  49.   Call IniWriteValue(v,"ScanOptions",sN,"1")
  50.  end if
  51. END SUB
  52.  
  53. 'Called when the Plugin is about to be removed from memory
  54. SUB Plugin_Terminate
  55. END SUB
  56.